home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / UI.cst / 00077_Start Activity.ls < prev    next >
Encoding:
Text File  |  2004-07-12  |  314 b   |  17 lines
  1. on mouseEnter me
  2.   set cursor = the number of member "pointer"
  3.   set mask = the number of member "pointer mask"
  4.   set the cursor of sprite the spriteNum of me=[cursor,mask]
  5. end
  6.  
  7. on mouseUp
  8.   puppetSound "Button Noise"
  9.   upDateStage
  10.   
  11.   repeat while soundBusy(1)
  12.     nothing
  13.   end repeat
  14.   
  15.   go the frame + 1
  16. end
  17.